home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / science / sm32a.zip / LIBRARY / PLOTEQ.LI < prev    next >
Text File  |  1994-07-22  |  223b  |  7 lines
  1. #  library plotEq
  2. #  ploteq(eq,x,y) plots an equation (implicit)
  3. #  e.g. ploteq(x*y+x^2=1,x,y)
  4.  
  5. ploteq(eq_,x_,y_,xmin_,xmax_) := plot(member(right(solve(eq,y)),1),x,xmin,xmax)
  6. ploteq(eq_,x_,y_) := ploteq(eq,x,y,-5,5)
  7.